﻿Public Class Uomo
  Inherits Persona
  Public Overrides _
        Function vaiParrucchiere() As String
    Dim s As String
    Dim nl As String = Environment.NewLine
    s = "Ricevuta fiscale: " & nl & nl & _
        "Taglio uomo           25 Euro" & nl & _
        "-----------------------------" & nl & _
        "Totale pagato         25 Euro"
    Return s
  End Function
End Class
